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From the Editors Desk 

Even though we are all settled into pur new 
building, hammers and saws have been interrupt- 
ing our phone calls and work for the past month. 
Even the SPHERE mobile home is being used as 
office space occasionally. SPHERE is growing 
faster than we can have new offices constructed. 

Documentation is improving! Currently the 
SPHERE Operators manual is being re-written 
with specific "push this button, now push that 
one" instructions. Complete instructions for 
SDOS and Basic will be done soon after the Op 
manual is finished. Schematics are being redone 
at the rate of one-a-month. Currently we have 
a very clear layout and schematics for KBD/2 and 
CPU/2, and printed (not copied) layout and parts 
list for SIM/1 • Blue-line schematics are available 
for $10.00 per page plus $5.00 handling. The 
blue prints are full size copies of the originals 
and are available only on a limited basis to users. 
For you to make copies of these prints would be 
a clear infringement of copyright. New assembly 
instructions for each and every board won't be 
far behind. We will send upgraded standard doc- 
umentation to any user who sends a SASE and 
$1 .00 copy fee with his request. When the Op 
manual is complete we will send it to users who 
request it for a $5.00 copy fee. 

We have a double edged sword that we would 
like to make into a plowshare. On one hand we 
have users with programming skill, while on the 
other we keep hearing from users and potential 
users who need programming help. To both parties 
we direct your attention to the Bits and Bytes 
column. 

Many people have asked us for the parts for 
ECOs. This month we have begun to prepare ECO 
Kits. The price may be a little high, but it does 
include the handling fee. 



Our policy is since the ECOs are mostly reliabi- 
lity improvements and general inhancements, not 
system failure problems, that we can not retrofit 
every system ever made . 

There has been a slacking off of program sub- 
mittals lately so the management feels we should 
hold off on our prizes for this newsletter. If 
possible the prizes will be awarded next time, we 
need to have your submittals! Prize winning entries 
will be published in the newsletter. Ail others will 
be mentioned and will be available upon request. 
Please note however that before we publish it or 
make it available we will try (to break) it. This 
may delay the printing of your submittal a while 
but hang in there, it will be available. 

Commencing with the first newsletter after the 
new Op manual is printed, the newsletter will be 
aimed at manual updates also. The newsletter is 
meant to be filed into your Op manual's appendix 
section for reference. The newsletter's page numbers 
will be modified so they will be uniform with the 
appendix page numbers. Just hang on, we are 
really going to do this thing RIGHT! ! 

Ernest Dixon 
Newsletter Editor 



PLEASE NOTE 



SPHERE mailing address: 
P.O. Box 129 
Bountiful, Utah 84010 

shipping address and plant location: 
940 North 400 East 
North Salt Lake, Utah 84054 
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Dear Sphere Users: 

The lead time for system 310 thru 330 Kits 
has been reduced to under 30 days for prepaid 
orders. The Assembly and testing department 
has been tripled in size to reduce lead times 
on assembled units. We have added a customer 
relations department in our continuing effort 
to produce "Satisfied Customers". The comment 
was made by one publisher recently that 
Sphere Corporation was the sweetheart of the 
industry in trying to help their customers. 
However, I must sound a small note of warning. 
It is possible to wear out your otherwise wel- 
comed phone calls when it becomes apparent 
that we are doing your assembly or trouble- 
shooting for you. To date, there are only a few 
customers out of nearly a thousand who have 
done so. One is obviously just harrassing us with I 
threats, sarcasm, etc. even after may personal 
attempts to solve his needs. The others just call 
for the socializing, I think. Should it take 2 
calls per day four days per week for four weeks? 
No wonder the rest of you have to wait so long. 
Mr. Waltner a user who almost never called, 
said of his kit, "I finally received the rest of 
my computer parts and have it up and running. 
It works great!" That was on April 20th and might 
have been April 10th except for the time used to 
help the few "cranks" amoung our users. Don't 
let this message discourage your call when you need 
help. 

We appreciate our distributors and their help. 
Feel free to order new parts through them and 
consult with them on your troubles. 

The new ROM board is just one example of 
our continued effort to add to our system. We are 
now announcing new power supplies made by 
Standard Power. One version is open frame and 
light duty. The other is enclosed with cord, fuse, 
over voltage protection, and heavy duty. The use 
of these "vendor provided" supplies will allow 
voltage adjustments to offset line drops. But 
watch out for the cost. That cost factor is why 
the initial Sphere Systems featured our own version. 
These new supplies may cause a considerable in- 
crease in retail system prices in the future. 

Monroe Tyler 
President 



OOPS 

As most SPHERE Basic users have found out, 
the Sys 2N ROM (E3 on SIM board) has a bug_^ 
in it. It so happens that when any block's chef^! 
sum equals 16 x , which is the case of block B6, 
the next block is missed (block B7 is not found). 
By rewinding some and re-reading the missed block 
the problem can be detoured. This problem has 
been corrected in the Sys 2 NF ROM (also known 
as P/N 000105 NR) and we will be glad to ex- 
change proms if you will send in your Sys 2N 
ROM or send a $25.00 deposit and we will Send 
you a new ROM. Since this is our goof (heaven 
forbid), no service/handling charge will be 
necessary. 



Management^ 

The management of SPHERE Corporation is 
pleased to announce the creation of the Customer 
Relations Department with Ernest Dixon as manager. 
Ernie was one of our first customers from Southern 
California and has been serving as a field representa- 
tive there. Welcome to UTAH Ernie. 

Doug Hancey 

Executive Vice President 



Missing parts in your order 1 i 

To help keep our costs (and your price) down and 
to improve our quality control, we request the follow- 
ing information when you call to inform us of short- = 
ages in your shipment: 

1) Your name, address and invoice number 

2) What parts you are missing 

3) What parts you got extra 

Please be specific - what board, location, part 
description, and quantity; SIM/1, El and E17,7404, 
2 of them. 

We will be happy to send your missing parts free of 
handling charge ONCE , however, if you call again, 
we will have to charge you for the parts and add the 
standard $5.00 handling fee and shipping charges. 
We don't say that we are perfect, quite often Pg~\ 
end up in the wrong bin and are shipped incorre\**y. 
We feel we can ask you to check your entire order at 
one time and only call us once for this problem. 



Page 2 



Review of My Computer Likes Me when 
i speak, in basic! 

"My Computer Likes Me..." provides a good 
introduction to Basic programming. Starting with 
simple print commands, it takes the reader through 
arithmetic operations, strings, variables and 
scientific notation. Using a sample problem on 
population growth it continues with manual data 
input, formatting, data statements, go to, and 
if/then statements. It concludes with descriptions 
and examples of for/next loops, subscriped vari- 
ables (single and double) and subroutines. 

The book is written with a humorus overtone 
and has sufficient detail and examples to lead 
even the novice to the point where he should be 
able to write very powerful programs. 

Although it is aimed at the beginner, the book 
should provide a good review of the fundamental 
Basic operations for anyone who may be somewhat 
rusty using Basic and at $2.00 it is certainly a 
bargain . 

R. S. Mason 



Q. What is the status of the Sys 2 ROM set men- 
tioned in the last newsletter? 

A. Due to the fact that the Sys 2 PDS software 
does not contain a mini-assembler in ROM, 
SPHERE does not feel that this piece of soft- 
ware can be sent out as standard PDS software 
for our systems. When this software is completed, 
probably a month or so, it will be available to 
our system owners for a copying fee of $40.00 
if you send in your PROMs (or a $70.00 deposit) 
or may be purchased ROMs and all for $120.00 
This purchase will include the mini-assembler on 
cassette, complete instructions and for an added 
$6.00 a source listing of both the proms and tape. 
If you are ready to send your money now, specify 
which keyboard you have (KBD/l or KBD/2). 

Q. A friend of mine wants a copy of Basic. Is this 
program copyrighted? 

A. All documentation, software, and hardware 
manufactured by SPHERE is either copyrighted 
or marked PROPRIETARY MATERIAL. SPHERE 
does not feel that software should be hidden 
under a bushel, however, to drop it from a 
plane as confetti is expensive. We want our 
software, as well as yours, to be available to 



others, but we feel we have the right to 
know who has it, just as you have the 
right to know who has the software you 
developed. We don't charge qualified 
SPHERE users for development of new soft- 
ware, however we will charge a non- 
SPHERE user for that software, we charge 
everyone the copy fee. What we are 
really trying to say is use our software, 
but let us copy it for you at a minimal cost 
so that we have it in our records and can 
verify that you get what you really need. 
See note on software prices. 

Q. I have an application I might like to 
market. Would SPHERE be able to help 
me announce my development to the 
SPHEREiverse? 

Q. I would like to get in touch with other 
users in my area. Can SPHERE send me a 
list of those close by? 

A. Sorry, we can not send out our users list 
to everyone, some users are developing 
things that the people they work with 
might not like or just don't want to be 
bothered. Beginning with this issue, we 
will devote some space to users and their 
systems. If you have an application, hard- 
ware modification, announcement of some 
kind, or just plain want others to know 
you are out there, tell us. See the Bits 
and Bytes column. 

Q. Why doesn't the REPEAT key on my new 
KBD/2 do anything? 

A. The repeat key on your keyboard does its 
job quite well, when it is pushed the 2 / 
data bit turns on. The job of reading the 
PI A for that bit isn't difficult either - 
the problem is that there just isn't any room 
in the ROM to implement it. We expect 
to have it in the Sys 2 ROMs when they 
are finished. 

Q. My assembled system didn't work on arrival^ 
Do you guys really check these systems ??? 

A. YES1 1 I All assembled boards and systems 
are tested thoroughly, however in ship- 
ment things tend to come loose. Cables 
come out of sockets, chips fall out, and 
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A. (continued) 

yes, we even have had a couple of broken CRTs 
reported to us. Sometimes while putting chips 
back in their sockets you notice a bent pin 
and claim we don't test things, but realize that 
while a bent pin won't be holding the chip 
down, it is still making contact. Our recently 
enlarged Quality Control Department is on the 
lookout for improperly seated components. When 
you get your assembled unit, DO NOT sign the 
shipper's release until you unpack, open, plug 
in, and use the unit. Mark on the shipping 
papers the condition of the machine, not the 
carton. ALL systems were working when they 
were shipped !!!!!!!!! 



Engineering Change Orders 

Beginning immediately parts for ECOs are 
available in kit form. Reference Global News 
Vol. 1 No. 2 for details on ECOs 1 through 10. 



ECO 


1 


no kit 


ECO 


2 


$5.50 


ECO 


3 


$7.00 


ECO 


4 


$5.50 


ECO 


5 


$5.25 


ECO 


6 


$5.30 


ECO 


7 


$8.00 


ECO 


8 


$5.75 


ECO 


9 


no kit 


ECO 


10 


$5.50 


ECO 


11 


no kit 


Submitted by 


Richard S. Mason 




1037 Park Hill Lane 




Escondido, Calif. 92025 


CRT/1 to decrease white hash (This mod provides a 


compromise between that of ECO 1 and ECO 2. Ed.) 


■ H.E8- 


11 &R5 


D5 ^ 


to E27-1 1 



to E26-2,-4, &.-13 
to E8-11 &1r5 

D5 




to E26-2,-4, &-13 




E26 



10 



to El 3-9 



to E27-1 1 



Bits and Bytes from our friends 

In this new column of Global News, we 
will feature free announcements from our 
users. If you want to place an announcement 
write to Bits and Bytes, Global News, P.O. 
Box 129, Bountiful, Utah 84010. 

We reserve the right to edit and comment 
on submittals to this column. Address inquires 
directly to the submitter, not to Global News, 
or SPHERE Corporation. 

Graphics 

Black and white or Color graphics with 128 by 
128 or 256 by 256 resolution is available 
from Vocor Corp. 96 East 500 South, 
Bountiful, Utah 84010. Color requires 
3 graphics boards. Each board $169.50, 
. deliveries said to begin in June 1976. 
Plotting software included (We have yet 
to see it work, but the developer has 
done good work before. Ed.) 

Users Group 

Sphere User's Group of the Southern Calif. 
Computer Society: 

Warren Weimer, President, 23025 Kinnard 
Ave., Carson, Ca. 90745 (213)835-9417. 

Utah Chapter of Southern California Computer 
Society: contact 

Wayne Bates, Organizing committee 
chairman, (801)376-2525. 
Mike Wise (801 )292-81 59 or Ernie Dixon 
(801)467-9100. Next meeting scheduled 
June 19 in or around Salt Lake City. 

Lonely Users 

Vincent Johnston, 402 Wildwood Avenue, 

Pitman, N.J. 08071 (609)589-3461 
Gary Shell, 3731 Hyde Park Avenue, 

Cincinnati, Oh. 45209 (513)531-1343 

have working DAA Modem 

Computer Widows 

Jerrie Raehl, 943 Begonia, Escondido, Ca.. 92027 

(was married May 29, Jim was talking computers 

less than an hour after "I Do"). 
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THE PART NUMBER GAME 

In an effort to keep track of our Stock and help you get the parts you need promptly, 
SPHERE is in the process of assigning Part Numbers to just about everything you can 
order. If you need something, please check the serialization of "The Part Number 
Game% to see if it is listed. 



Part number 

0001 OONR 
0001 OOA 


Old designation 

PDSV3A 
PDSV3D 


Use 

CPU/1 E6 CPU/2 E6 
CPU/1 E6 CPU/2 E6 


Remarks 

Use with KBD/1 

Use with KBD/1 


0001 01 NR 
0001 01 A 


PDSV3A 
PDSV3N 




CPU/1 El 2 CPU/2 El 2 
CPU/1 El 2 CPU/2 El 2 


Use with KBD/1 


0001 02NR 
0001 02A 


PDSV3A 
PDSV3N 




CPU/1 E20 CPU/2 E20 
CPU/1 E20 CPU/2 E20 


Use with KBD/1 


0001 03 NR 
0001 03A 


PDSV3A 
PDSV3N 




CPU/1 E33 CPU/2 E35 
CPU/1 E33 CPU/2 E35 


Use with KBD/1 


0001 04NR 
0001 05NR 


PDSV3N 
SYS2NF 




CPU/1 E6 CPU/2 E6 
SIM/1 E3 


Use with KBD/2 


0001 06NR 
000107NR 


SDOS FC-9 
SDOS FD-4 


CPU/1 E6 CPU/2 E6 
CPU/1 El 2 CPU/2 El 2 




0001 08NR 
0001 09NR 


SDOS FE- 
SDOS FF- 


■10 
■11 


CPU/1 E20 CPU/2 E20 
CPU/1 E33 CPU/2 E35 


Use with KBD/1 
Use with KBD/1 


000110NR 
000111NR 


SDOS FE- 
SDOS FF- 


•12 
■17 


CPU/1 E20 CPU/2 E20 
CPU/1 E33 CPU/2 E35 


Use with KBD/2 
Use with KBD/2 


00011 5NR 
0001 16NR 


1 card computer 
1 card computer 


CPU/2 E20 
CPU/2 E35 





Suffix designations: 
NR = No Revision 
alpha character = revision level 
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SOFTWARE AVAILABLE FOR SPHERE SYSTEMS 

All require signed non-disclosure agreement and pre-payment before shipment. 

NAME MEDIUM MIN SYS* USER COST NON-USER COST REMARKS 

BASIC version 1 



BASIC extended 16K 



8K 



4K 



MEMORY TEST PROGRAM 



PERRY ASSEMBLER 



I/O HANDLER ROUTINES 



CT 


330 


$10. 


$300. 


1 copy 


PT 


330 


25. 


325. 


free to 


D 


340 


25. 


325. 


Min Sys 
users 


CT 


330 


10. 


1000. 


1 copy 


PT 


330 


25. 


1000. 


free to 


D 


340 


25. 


1000. 


Min Sys 
users up- 
on return 
of Basic 
Ver 1 . 


CT 


330 


50. 


800. 




PT 


330 


75. 


800. 




D 


340 


75. 


800. 




CT 


320 


50. 


600. 




PT 


320 


75. 


600. 




D 


340 


75. 


600. 




ROM 


310 


1000. 


1500.** 




CT 


330 


400. 


600. 




PT 


330 


450. 


550. 




D 


340 


410. 


610. 




ROM 


310 


600. 


800. 




CT 


320 


10. 


500. 




PT 


320 


35. 


525. 




D 


340 


25. 


510. 




ROM 


310 


360. 


860. 




CT 


320 


400. 


600. 




PT 


320 


425. 


625. 




D 


340 


410. 


610. 




ROM 


310 


500. 


800. 





CT=Cassette Tape PT=Paper Tape D=Floppy Disk ROM=l 702 Read Only Memories 

* = User Minimum system, the sum of all modules purchased from SPHERE, ie. 

a 310 user does not qualify for a $50. copy of 4K Basic on cassette, but will have to 
pay $600. If he buys a SIM board he now has a system 320 and can get Basic for $50. 
System 330 users who buy a printer and floppy disk from SPHERE qualify for both 330 
and 340 software (they must pay the copy fee on SDOS). The reverse also applies to 
340 users who buy a SIM board. To buy a 4K MEM board and fill it up with outside chips 
does not qualify one to the things available to those buying a SPHERE 16K MEM board. 
Having the hardware does not qualify, it must be bought from SPHERE. 

** = Includes ROM/1 board 

Effective on all System sales after April 1, 1976, and on all System upgrades after January 1,1976, 
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Mnemonic Assembler 



Note that the assembler is in two parts. The 
second part is designed to overlap the last in- 
struction of the first part, so that label 'Y' 
refers to the same location in both parts. The 
first part can be used alone to assemble a 
program in mnemonic format, but this will 
change the source text to Sphere mini- 
assembler format. The second part is required 
if you want the source text to end up in 
mnemonic format. The second part, when used 
alone, will translate mini-assembler text into 
mnemonic format. Note that two listings of 
each part have been included. One listing is 
in mini-assembler format and the other is in 
mnemonic format. Also included is a hexa- 
decimal memory dump of the entire program 
(parts 1 and 2 plus mnemonic table). 

Unfortunately, this program requires a 16K 
memory board, but it could be moved into low 
memory if care is taken to limit the text buffer 
size so as not to interfer with the assembler. 

The program occupies 1792 ]Q bytes of memory, 
of which 1024io bytes are used for the mnemonic 

table. Adescription of the program and its use 

is also enclosed. 

For convenience in entering the mnemonic 

table I have included a mnemonic table loader. 

This program need be used only once, since the 

table can be stored on tape along with the 

assembler, once it has been entered. 

If, for convenience, you would like paper 

tapes of some of these programs, I can furnish 

them, provided you can give me details on the 

format you want. I use my own unconventional 

format. 

Submitted by 

Anthony Pierry 
90 Ruxton Street 
Uniondale, N.Y. 11553 

(This implementation is for PDS V3A, to use with 
PDS V3N, all references to routines in PDS should 
be checked. Ed.) 



Program Description 

The program consists of two major parts, the 
mnemonic format to Sphere format translator and 
the Sphere format to mnemonic format reverse 
translator. The mnemonic to Sphere translator 
scans the buffer starting at location 200, and 
looks first for an equate statement ('=') or an 
'END' (column 1 does not contain either '=' or 
a blank). If an equate statement is found or a 
line which contains only blanks or comments is 
encountered, then nothing is changed on that 
line and the next line is scanned. If the 'END' 
is encountered then the mnemonic to Sphere 
translation is finished and the mini-assembler is 
called in. If the line contains a mnemonic, the 
mnemonic is stored in locations C0-C3. Next, 
column six is examined to begin deciphering the 
addressing mode. If column six contains '%' then 
the direct mode has been selected. A subroutine 
is entered which replaces the '%' with a 'D', and 
then a search subroutine is called to search the 
mnemonic table for the mnemonic previously 
stored at locations C0-C3. It should be noted 
here that only regions of the table that contain 
direct addressing mode instructions are searched. 
This avoids ambiguities (i.e. the same mnemonic 
is repeated in the table for each addressing mode 
that applies to that instruction) and also speeds 
up program execution. 

To understand how this search is accomplished 
it is necessary to understand how the table is 
organized. Only four bytes are reserved for each 
instruction. This leaves room for up to four char- 
acters for each mnemonic but it does not leave 
any room to store the op-codes. However, if we 
store each mnemonic in order of its op-code, 
leaving blanks for unimplemented op-codes we can 
then compute the op-code, since it will be a 
function of the location where the mnemonic is 
found. The table starts at location 4AO0, so if 
the mnemonic is found at location L then the op- 
code (0) is given by 0=(L-4A00)/4. This compu- 
tation takes place in the search subroutine. 
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Program Description cont'd. 



However, since a given mnemonic may occur in 
more than one place in the table, the search 
routine must search only the parts of the table 
which correspond to the desired addressing mode 
op-codes. The search subroutine searches the 
table from the location pointed to by the index 
register to the location pointed to by the con- 
tents of location DO. The op-code is returned 
in accumulator A in binary. If the mnemonic 
was not found in the table a zero is returned 
in accumulator A. Since instructions with the 
same addressing mode occur together in groups 
in the table, only a few regions of the table 
need be searched once the addressing mode is 
known. In the case of the direct addressing 
mode, for example, the table is searched from 
4C40 to 4C80 and from 4D40 to 4D80. In the 
case of branch instructions the BSR instruction 
(op~code 8D) is treated as a special case since 
it is in the middle of a group of immediate mode 
instructions. Other special cases are LDX,CPX, 
and LDS immediate mode, which are three byte 
instructions whereas all other immediate mode 
instructions require two bytes. These are the 
only cases requiring special treatment. 

Determining the addressing mode is not 
always that simple. If column six contains a 
blank then we must determine whether the mode 
is extended, relative, indexed, or inherent. If 
an operand is absent (column 7 is blank) then 
then inherent mode is assumed, otherwise 
columns 8 and 9 are examined to detect the 
indexed mode. If neither of these modes are 
detected then the first character of the mnemonic 
is tested. If it is the letter 'B' then the relative 
mode is assumed. If the addressing mode has not 
yet been detected, then it must be the extended 
mode by default. Once the proper mode is known, 
the table can be searched, the op-code can be 
put Into columns 3 and 4, columns 2 and 5 can 
be replaced with blanks and the proper character 
(E,D, or R) can be put into column 6. If the 
instruction was an indexed mode, then columns 
8 and 9, or 9 and 10 are given blanks to erase 
the ',X ! characters. 

The Sphere format to mnemonic format reverse 
translator begins in the same way as the mnemonic 
to Sphere translator, by skipping over equate 
statements or lines without instructions, and 
looking for the 'END' statement. The op-code 
is then placed in location DO and the location 



of the mnemonic is computed using L=(4*0) +4A00, 
Next, the mnemonic found at that location is 
written into columns 2 through 5. Then column 6^"^ 
is examined. If an 'R' is present we simply remove*' 
it and we are done. Otherwise, we look for an 'E'. 
If an 'E' is present we look at the op-code previously 
stored at DO. If it is CE, 8C, or 8E we replace the 
'E' in column 6 with a '*'. Otherwise, we put a 
blank in column 6 to remove the 'E'. We are then 
finished with this line. If instead a 'D' was present 
in column 6 we must determine whether we have a 
direct, immediate, or indexed instruction. This is 
determined by the range in which the op-code 
happens to fall. For example, if the op-code lies 
between 70 and 90 then the instruction mode is 
immediate and we replace the 'E' with '*' and go 
to the next line. If the indexed mode is detected 
then we must remove the 'E' and place the characters 
',X' after the operand. This is all there is to the 
reverse translation. ' 



Simple Mnemonic Assembler 

by Anthony Pierry 

This program is simple because it utilizes the 
Sphere P.D.S. mini-assembler to do the actual 
assembly. Therefore, this program isn't really an 
assembler at all. It is in fact a translator whose 
primary function is to enable the Sphere mini- 
assembler user to assemble programs without having 
to look up the op-codes or concern himself with the 
number of bytes used by an instruction (E,D, or R). 
This is accomplished in the program by a very simple 
process. The user simply loads his program, using 
the editor, in a format similar to the Sphere mini- 
assembler format but with mnemonics replacing 
op-codes. The Simple Mnemonic Assembler program 
is then run. The user's program is automatically 
translated into Sphere mini-assembler format, the 
mini-assembler is called in to do the actual 
assembly, and then the program is automatically 
translated back into the original mnemonic format. 
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Simple Mnemonic Assembler (cont'd) 



The entire assembler with mnemonic table 
occupies 1792|o bytes of which 1024 10 bytes 
are used for the mnemonic table. The mnemonic 
(program format is illustrated below in comparison 
with the Sphere mini-assembler format. Note that 
the •'(§>' character is still used to refer to a label 
as an operand but the characters E,D, and R are 
not used. The '*' symbol is used to indicate the 
immediate addressing mode. The '%' symbol is 
used to indicate the direct addressing mode. 
The operand followed by ^X 1 indicates the 
indexed mode. If none of these characters 
appears the extended, implied, or relative 
modes will be assumed (depending upon the 
particular instruction, of course). Note also 
that the characters must appear in the proper 
places, just as when using the mini-assembler 
and that you must space out past column seven 
or instructions that have no operand. 



0123U56789 


0123 1 +56T89 


A LDAA#1F 


A 86 D1F 


STAA 2000 


BT E2000 


CLRA 


kF 


CMPB$F0 


Dl DFO 


BNE @A 


26 R@A 


LDAA 0,X 


A6 DO 


LDX #10A1 


CE E10A1 


END 


END 



Be careful! No errors are flagged, so if you 
make a syntactical error you may not get 
back exactly the program you put in. Use 
Re-edit to check your program after it has 
been assembled. 



NOTES: 

1) Re-edit should be called using the 
following program: 

BD EFC68 

7E EFC18 
END 
This prevents a run-away condition when 
•ESC is pressed, which could cause 
problems. 

2) In this version of Simple Mnemonic 
Assembler the comma character may not 
be used as a label, since it interferes 
with detection of the indexed addressing 
mode. 



Mnemonic Table Loader 



Instructions For Use: 

1) Open location 2000 and hit 'G' 

2) A '0' should appear followed by a space and 
a blinking cursor 

3) Since is an unimplemented op-code, hit 
'ESC key. 

4) A T should appear on the next line 

5) Type NOP and then 'ESC key 

6) A '2' should appear on the next line 

7) 2 is unimplemented so hit 'ESC key 

8) Continue this process, typing the correct 
mnemonics must be entered more than once. 
For accumulator instructions do not leave an 
intervening blank. 

ex: type LDAA not LDA A 



Simple Mnemonic Assembler 

Instructions For Use: 

1) Enter user program in mnemonic format 
using editor. 

2) Scroll up and hit 'ESC as usual 

3) Call debug (Ctrl D) and open location 
4700 HEX 

4) Hit'G' key 

5) When cursor returns, program will be 
assembled 

6) Call Re-edit to examine the buffer. 
Program should appear unmodified. 

7) Return to debug to run user program 
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A 



C6 
D7 

5F 
D7 
D7 
CS 
DF 
3D 
DE 
96 
5F 
3D 
DF 
3 6 
3D 
7 3 
3D 

A 6 



36 
A 6 
D3 
A7 



A 7 
32 

CV 
'-> 

A 7 

32 

3 

A 7 

■J 

23 



pmepouic tapes 

LOAD 33 
1/13/76 
2000 3Y AiJTHOMY PI 333Y 
D10 /SET EASE TO . 1 6 
D5 /ST033 Ii'J A33 

D30 /INITIALISE OP CODE 
E.'lAOO /BEGINNING OF TA3L3 
DDO /TA3L3 POINTER 
3FD16 /33.LF 
D1C /3U3303 P0INTSP 
D30 /CURRENT OP C0D3 

EFF64 /PRINT OP C0D3 

D1C /ADVANCE CU3S03 

D20 

EFCAD /PRINT 1 3LANX 



p /i 
j3 



n 



3F363 /G3T 3NSNQNIC 
/SCNPTP 
/ATM L3TT33 
/SAVE 03 STACK 
/SANE FOP PEST OF... 
/NNEN0NIC 



D2 

Dl 



DO 

DDO /TABLE POINTER 

DO /PUT 1ST GEAR IN 
/GET NENT CHAP 
/UPDATE POINTER 

DO /SAME FOP PEST OF. . . 
/MNEMONIC 

DO 



DO 



3ca /next o? cod:: 



3D 
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MNEMONIC TABLE 
LOADER 
1/18/76 
= 1000 BY ANTHONY PIERRY 
LDAB#10 /SET BASE TO .16 
STAB%5 /STORE IN ARB " 
CLRB 
STAB%4 
x STAB%EO /INITIALIZE OP CODS 

LDX #4A00 /BEGINNING OF TABLE 
A STX %D0.. /TABLE POINTER 
JSR ED 16 /CRLF 
LDX %1C /CURSOR POINTER 
LDAA%EO /CURRENT OP CODE 
CLRB 

JSR F.F64 /PRINT OP CODE 
STX %1C /ADVANCE CURSOR 
LDAA#20 

JSR FCAD /PRINT 1 BLANK- 
ING EO 

JSR FC6E /GET MNEMONIC 
LDX %24 /SCNPTR 
LDAA 3,X /4TH LETTER 

/SAVE ON STACK 
/SAME FOR REST OF... 
/MNEMONIC 



A_.£* 



2,X 



l,X 



0,X 



EN 



PSHA 
LDAA. 
PSHA 
LDAA 
PSHA 
LDAA 
LDX %D0 
STAA 0,X 
PULA 
INX <■* 
STAA 0,X 
PULA 
INX 
STAA 
PULA 
INX -.""""" 
STAA 0,X 
INX ^ 
BRA .@A 
D 



/TABLE POINTER 
/PUT 1ST CHAR IN 
/GET NEXT CHAR 
/UPDATE POINTER 
/SAME FOR REST OF... 
/MNEMONIC 



o»x- 



/NEXT OP CODS 
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SIMPLE 

MNEMONIC ASSEMBLER 

-PART I- 

C MNEMONIC TO SPHERE) 

VERSION I. 1 

1/25/76 



s 




A700 . BY ANTHONY PI ERRY 




CE 


E1FF 


L 


8 


/LOC BEGINNING OF LINE 




DF 


DFO 


/SAVE IT 




8 




/COLUMN 'l 




A6 


DO 






81 


D3D 


/* = »? 




26 


R@M 


' 


A 


8 


/LOOK FOR END OF LINE 




A6 


DO 


'■■'■>' 




81 


D60 






26 


R@A 






20 


R@L 


/FOUND END OF LINE 


M 


81 


D20 


/COLUMN 1 IS BLANK? 




27 


R@Z 






BD 


EFDA1 /CALL PDS ASSEMBLER 


«. 


7E 


E@Y 


/REVERSE TRANSLATE 


Z 


8 






i 


A6 


DO 






81 


D20 


/IS LINE BLANK? 




27 


R§A 


/YES- > GET NEXT LINE 


. . .. 


-97 


DCO 


/STORE MNEMONIC IN... 




8 




/LOCATIONS C0-C3 




A6 


DO 






97 


DC1 


■* .. 




8 








A 6 


DO 






97 


DC2 






8 








A6 


DO 






97 


DC3 






8 




/COLUMN 6 




A6 


DO* 






81 


D25 


/»"»••? 




26 


R@© 






7E 


2@D 


/YES* GO TO DIRECT 


§ 


31 


D23 


/',?'? 




2_6 


-- ' ■ ■ 




7E 


S§I 


/YES* 30 TO IMMEDIATE 


■* 


3 




/COLUMN 7 




A6 


DO 


+* 




31 


D*20 


/NO OPERAND? 




26 


R@% 




£ 


7E 


E@0 


/NO* GO TO INHERENT 


% 


31 


D60 


/NO OPERAND? 




27 


R@$ 






8 




/COLUMN 3 




A6 


DO 


' 




81 


D60 


/NOT INDEXED? 




27 


r@u 


/YES 30 TO DSCI 31 ON 




31 


D2C 


/COMMA? 




27 


R@X 


/YES->G0 TO INDEXED 




3 




/COLUMN 9 




A6 


DO 






81 


jaao. 


/COMMA? Page 12 



u 



. ■■...... - .. ■ ,..l...„.... — .-I — »,l . . . J . ,, . . ..,,.. ^ ..., ^ ,...- ^.^ .. - ., ,..,. r .., 

W 36 D42 /EXTENDED OH RSLATjVr- 
9 1 DC /FIRST LETTER-^ 
27 R@R /YES-> RELATIVE' 
7E E®E /NO* EXTENDED 
R 8D R@+ /CALL RELATIVE 
V 7E E@F /GO TO FINISH 
X 3D R@. /CALL INDEXED 

20 R§\ 
I BD E@; /CALL IMMEDIATE 
20 R§\. 

F. D BD E§: /CALL DIRECT 
20 R@\ 

E BD E@* /CALL EXTENDED 
20 R@\ 

BD E@= /CALL INHERENT 
20 R§\ 

+ 86 D53 /RELATIVE SUBROUTINE 

91 DC1 /SECOND. LETTEH=S 

26 R@l /N0->N0T BSR 

86 D8D /YES* OP CODS IS 8D 
20 R@2 

1 CE E4AC0 /STOP SEARCH HERE 
DF DDO 

CE E4A80 /START SEARCH HERE 

BD E@S /CALL SEARCH ROUTINE 

2 DE DFO /COLUMN 
C6 D52 /'R' 

E7 D6 /PUT INTO COLUMN 6 
39 

• 86 D20 /INDEXED SUBROUTINE 
A7 DO /ERASE COMMA 
A7..D1 /ERASE 'X' 

DE DFO /COLUMN 
86 D44 /'D' 
. A7 D6 /PUT »D» IN COL 6 
CE E4BC0 /STOP SEARCH HERE 
DF DDO 

CE E4330 /START SEARCH H^RE 
BD E@S /CALL SEARCH 
26 R@3 

CE E4CC0 /MNEMONIC NOT FOUND 

DF DDO /CONTINUE SEARCHING 

CE E4C80 

BD E@S 

26 R@3 /MNEMONIC FOUND 

CE E4DC0 /MNEMONIC NOT FOUND 

• DF DDD /CONTINUE SEARC*-rpjn 
CE E4D80 

BD S@S ^ 
3 39 . /MNEMONIC FOUND* RETURN 
* 9 6 DCO /IMMEDIATE SUBROUTINE 

81 D4C /FIRST LETTER=L? 

26 R§4 

96 DC2 /YES 

81 D58 /THIRD LETTER=X? 

26 RQ5 

DE DFO /COLUMN 

86 D45 /»E' 

A7 D6 /PUT «E» IN COL 6 

3 6 DCE /OP CODE-CE 

39 

5 81 D53 /THIRD LETTER=S 

26 R@6 

DE DFO /COLUMN p nna in • 
Rf- n*S KQge ' J * 



A7 


D6 /PUT VE* IN COL 6 


86 


D8E /OP C0DE=8E 


39 


''■'.- 


4 8i 


D43 /FIRST .LETTER- C 


26 


R@6 


96 


DC2 /YES 


81 


D58 /THIRD LETTER=X 


26 


R@6 


DE 


DFO /COLUMN 


86 


D45 /*E' 


A7 


D6 /PUT *E' IN COL 6 


86 


D8C /OP C0DE-8C \ 


39 


■■••"'. 


6 DE 


DFO /COLUMN 


86 


D44 /*D f 


A7 


D6 


CE 


E4C40 /SET UP FOR SEARCH,' 


DF 


DDO 


CE 


E4COO 


BD 


E@S /CALL SEARCH 


26 


R@7 


CE 


E4D40 /MNEMONIC NOT FOUND 


DF 


DDO /CONTINUE SEARCHING 


CE 


S4DG0 


BD 


E@S 


7 39 




: DE 


DFO /DIRECT SUBROUTINE 


86 


D44 ./'D* 


A7 


D6 /PUT »D» IN COL 6 


CE 


S4C30 /SET UP FOR SEARCH 


' DF 


DDO 


CE 


E4C40 


BD. 


JESS.. /CALL .SEARCH _ . 


26 


R@7 


CE 


E4D30 /MNEMONIC NOT FOUND 


DF 


DDO /CONTINUE SEARCHING 


CE 


E4D40 


3D 


E@S. 


39 




» DE 


DFO /EXTENDED SUBROUTINE 


86 


D45 /'E* 


.1 A7 


D6 /PUT *E' IN COL 6 


CE 


E4C00 /SET UP FOR SEARCH 


DF 


DDO 


CE 


E43C0 


3D 


E@S\ /CALL SEARCH 


.—. 26 


K9S"~ 


CE 


E4DOO /NOT FOUND... 


DF 


DDO /CONTINUE SEARCH 


CE 


EilCCO 


BD 


E@S 


26 


R@8 


CE 


E4EOO /NOT FOUND... 


r df 


DDO /CONTINUE SEARCH 


CE 


E4DCO 


BD 


£@S 


8 39 




= CE 


E4A80 /INHERENT SUBR. 


DF 


DDO /SET UP FOR SEARCH 


CE 


E4AOO 


BD 


E@S /CALL SEARCH 


26 


R@8 


CE 


E4B80 /NOT FOUND... Pa 9 e 1 



Or 


UDU 


'/CUivTlMUE SEARCH 


CE 


E4AC0 


BH_E0S_ 


. . . ... .. 


39 






F DE 


DFO 


/FINISH 


C6 


D20 




E7 


D2 


/ERASE COLUMN 2 


8 




/NEXT WE WRITE... 


8 




/THE OP CODE INTO.. 


8 




/COLUMNS 3 & 4 


C6 


D10 


/BASE .16 


D7 


D5 


/PUT INTO ARB 


- 5F 






D7 


D4 




BD 


EFF64 /BINASC 


C6 


D20 




E7 


DO 


/ERASE COLUMN 5 


7E 


E@A 


/FIND END OF LINE 


S 96 


DCO 


/SEARCH SUBROUTINE 


Al 


DO 


/COMPARE 1ST LETTER 


26 


R©N 


/NO MATCH? 


96 


DC1 


/A MATCH! 


Al 


Dl 


/COMPARE 2ND LETTER 


26 


R@N 


/NO MATCH? 


96 


DC2 


/ANOTHER MATCH! 


Al 


D2 


/COMPARE 3RD LETTER 


26 


R@N 


/NO MATCH? 


96 


DC3 


/A THIRD MATCH! 


Q Al 


D3 


/COMPARE 4TH LETTER 


26 


R8P 


/STILL A CHANCE. 


DF 


DF6 


/MNEMONIC FOUND! 


D6 


DF6 


/COMPUTE OP CODE... 


CO 


D4A 


/SUBTRACT 4AOO 


96 


DF7 


/DIVIDE BY 4 


56 






46 






56 






46 






39 






N 8 
8 
8 
8 
9C 




/NEXT MNEMONIC 


DDO 


/END OF SEARCH? 


26 


R@S 


/IF NO, TRY AGAIN 


4F 




/YES, NO OP CODE 


39 


\ 




P 81 


D2"0~" 


73 LETTER MNEMONIC? 


26 


R@N 


/IF NO, THY AGAIN 


36 


D60 


£60 INSTEAD OF 20 


7E 


EJQ 


/RECHECK 


Y 3F 


/REVERSE TRANSLATOR.. 


END 


/STARTS HERE 
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• SIMPLE 
MNEMONI C ASSEMBLER 
-PART 1- 
CMNEMONIC TO SPHERE) 
VERSION 1.1 
1/25/76 
= 4700 3Y ANTHONY PI ERRY 

LDX #1FF 
L INX /LOC BEGINNING OF LINE 

STX %F0 /SAVE IT. 
INX /COLUMN 1 

LDAA 0,X 
CMPA#3D /* = *? 
BNE @M 
A INX /LOOK FOR END OF LINE 

LDAA CX 
CMPA#60 



BNE 


@A 


, 


BRA 


@L 


/FOUND END OF LINE 


M CMPA#20 


/COLUMN 1, IS BLANK? 


BEQ 


@Z 




JSR 


FDA1 /CALL PDS ASSEMBLER 


JMP 


@Y 


/REVERSE TRANSLATE 


2 INX 






LDAA 


0*X 


CMPA#20 


/IS LINE BLANK? 


BEQ 


@A 


/YES->GST NEXT LINE '• 


STAA%CO 


/ STO RE MN EM ON I C I N ■'. . : . 


INX 




/LOCATIONS C0-C3 


LDAA 


0,X 


STAA%C1 




INX 






LDAA 


o*x 


STAAZC2 




INX 






LDAA 


o,x 


STAA%C3 




INX 


• • 


/COLUMN 6 


LDAA 


0>X 


CMPA#25 


/ • % • ? 


BNE 


@@ 




JMP 


@o 


/YES, GO TO DIRECT 


§ CMPA#23 X 


/•#•? 


BNE - 


-@* 




JMP 


01 


/YES/ GO TO IMMEDIATE 


* INX 




^COLUMN 7 


LDAA 


p*x 


CMPA#20 


/NO OPERAND? 


BNE 


§% 




$ JMP 


90 


/NO^ GO TO INHERENT 


% CMPA#60 


/NO OPERAND? 


BEQ 


@$ 




INX 




/COLUMN 8 


LDAA 


o*x 




CMPA#60 


/NOT INDEXED? 


BEQ 


@u 


/Y3S->30 TO DECISION 


CMPA#2C 


/COMMA? 


BEQ 


@x 


/YSS->GO TO INDEXED 


INX 




/COLUMN 9 


LDAA 


o,x 




. r.\AV>&uor. 


/piimm4'> P Q g e ^ 



H 



y 



£5&ui 


SA 


/IWjU IU l.'-jj.'v'.ljjj 


WLDAA#42 


/EXTENDED OR RELATIVE? 


CMPA%CO 


/FIRST LSTTER=E? 


3EG 


@R 


/YES-> RELATIVE 


JMP 


@E 


/NO, EXTENDED 


R BSR 


@+ 


/CALL RELATIVE 


\ JMP 


@F 


/GO TO FINISH 


X BSR 


@. 


/CALL INDEXED 


BRA 


@\ 




I J5R 


@; 


/CALL IMMEDIATE 


BRA 


@\ 




D JSR 


@: 


/CALL DIRECT 


BRA 


@\ 




E JSR 


@* 


/CALL EXTENDED 


BRA 


@\ 




JSR 


@s 


/CALL INHERENT 


BRA 


@\ 




+ LDAA#53 


/RELATIVE SUBROUTINE 


CMPA%C1 


/SECOND LETTEE=S? 


BNE 


si 


/NO->NOT 35R 


LDAA#8D 


/YES, OP CODE IS SD 


BRA 


@2 




1 LDX 


#4AC0 /STOP SEARCH HERE 


STX 


%D0 




LDX 


#4A80 /START SEARCH HERE 


JSR 


@S 


/CALL SEARCH ROUTINE 


2 LDX 


%FO 


/COLUMN 



/•R' 

/PUT INTO COLUMN 6 



/INDEXED SUBROUTINE 
/ERASE COMMA 
/ERASE 'X' 
"/COLUMN - 
/•D' 

/PUT *D' IN COL 6 
/STOP SEARCH HERE 



LDAB#52 

STAB 6,X 

RTS 

LDAA#20 

STAA 0,X 

STAA UX 

LDX %FO 

LDAA#44 

STAA 6,X 

LDX #4BC0 

STX %D0 

LDX #4B3 /START SEARCH HERE 

JSR @S /CALL SEARCH 

BNE @3 

LDX #4CCO /MNEMONIC 

STX %DO /CONTINUE 

LDX #4C80 

jsr @s; 

BNE' ta\ /MNEMONIC 
L DX # 4 D do- /MN EM ON I C 
~STX""%DO /CONTINUE 
LDX #4D80 
JSR @S ~* 

RTS - /MNEMONIC FOUND, RETURN 
LDAA%CO /IMMEDIATE SUBROUTINE 
CMPA#4C /FIRST LETTER=L? 
BNE @4 
LDAA%C2 /YES 
CMPA#58 /THIRD LETTER=X? 
BNE @5 

LDX %F0 /COLUMN 
LDAA#45 /'E' 

STAA 6, X /PUT *E' IN COL 6 
LDAA#CE /OP CODE=CE 
RTS 



NOT FOUND 

SEARCHING 



FOUND 
NOT FOUND 

SEARCHING 
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5 CMPA#53 '/THIRD' LETTER* S? 
BNE ®6 

LDX %F0 /COLUMN 
...LDAA#45 .....'. 

STAA 6,X /PUT ' E» IM COL 6 

LDAA#3S /OP C0DE=3E 

RTS 
4 CMPA#43 /FIRST L2TTER=C? 

BN2 @S 

LDAA%C2 /YES 

CMPA#53 /THIRD LETTER=X? 

BNE ©6 

LDX %FO /COLUMN 

LDAA#45 /'E' 

STAA 6,X /PUT 'S* IN COL 6 

LDAA#3C /OP C0DE=3C 

RTS 

6 LDX %F0 /COLUMN 
LDAA#44 /'D' ' 
STAA 6jX 

LDX #4C40 /SET UP FOR SEARCH 

STX %DO 

LDX #4C00 

JSR @S /CALL SEARCH 

BNE @7 

LDX #4D40 /MNEMONIC MOT FOUND 

STX %DO /CONTINUE SEARCHING 

LDX #4DOO 

JSR as 

7 RTS 

: LDX %FO /DIRECT SUBROUTINE 

LDAA#44 /»D» 

STAA 6>X /PUT 'D' IN COL S 

LDX #4CSO /SET UP FOR SEARCH 

STX %DO 

LDX #4C40 

JSR OS /CALL SEARCH 

BNE 87 

LDX #4D30 /MNEMONIC NOT FOUND 

STX %D0 /CONTINUE SEARCHING 

LDX #4D40 

JSR **@S 

RTS 
' LDX %FO /EXTENDED SUBROUTINE 

LDAA#45 /'E' 

STAA 6jX /PUT ' E' IN COL 6 

LDX_#4COO /SET UP FOR SEARCH 

STX %DO 

LDX #4BC0 

JSR @S~ /CALL SEARCH 

BNE- @8 

LDX #4DOO /NOT FOUND... 

STX %DO /CONTINUE SEARCH 

LDX #4CCO 

JSR @S 

BNE @3 

LDX #4E00 /NOT FOUND... 

STX %DO /CONTINUE SEARCH 

LDX #4DC0 

JSR @S 
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- w**p ■" 


i~ff'-fi TS ^ .<■-'■• 


' •*T , W"*" • ■ r- V; q,- 




= LDX #4A80 /INHERENT SU3R. 




STX %D0 


/SET UP FOR SEARCil 




LDX #4A00 




JSR @S 


/CALL SEARCH 


)" 


BNE @8 






LDX #4380 /NOT FOUND... 




STX %D0 


/CONTINUE SEARCH 




LDX #4AC0 


"f 


.J.SR_ @S 






RTS 






F LDX %F0 


/FINISH 




LDA3#20 






STAB 2,X 


/ERASE COLUMN 2 




INX 


/NEXT WE WRITE... 




INX 


/THE OP CODE INTO.. . 




INX 


/COLUMNS 3 & 4 




LDAB#10 


/BASE . 16 




STAB%5 


/PUT INTO ARB 




CLRB 






STAB%4 




1 


JSR FF64 /BINASC 




LDAB#20 






STAB 0,X 


/ERASE COLUMN 5 




JMP @A 


/FIND END OF LIME 




S LDAA5SC0 


/SEARCH SUBROUTINE 




CM PA 0,X 


/COMPARE 1ST LETTER 




BNE @N 


/NO MATCH? 




LDAA%C1 


/A MATCH! 




CMPA 1,X 


/COMPARE 2ND LETTER 




BNE @N 


/NO MATCH? 




LDAA%C2 


/ANOTHER MATCH! 




CMPA 2,X 


/COMPARE 3RD LETTER 


t 


BNE m 


/NO MATCH? 


LDAA%C3 


/A THIRD MATCH! 




Q CMPA 3,X 


/COMPARE 4TH LETTER 




BNE @P 


/STILL A CHANCE. 




STX %F6 


/MNEMONIC FOUND! 




LDAB%F6 


/COMPUTE OP CODE... 




SUB3#4A 


/SUBTRACT 4A00 




LDAA%F7 


/DIVIDE BY 4 




RORB .. 




— 


RORA 
RORB 
RORA 


-■■ ■ - ' ■ ■ - - 


"1 


RTS V 






N INX \ 


/NEXT MNEMONIC 


— 


— INX 

INX 






INX 


#-* 




CPX %Q0 


/END OF SEARCH? 




BNE @S 


/IF NO, TRY AGAIN 




CLRA 


/YES, NO OP CODE 




RTS 






P CMPA#20 


/3 LETTER MNEMONIC? 




BNE @N 


/IF NO, TRY AGAIN 




LDAA#60 


/60 INSTEAD OF 20 


"! 


JMP §0 


/RECHECK 




Y SWI /REVERSE TRANSLATOR.. 




END /STARTS HERS 
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SIMPLE. 
MM El ON I C ASSEMBLER 
-PART 2- 
< SPHERE TO MNEMONIC) 
VERSI ON 1 . 1 
1/25/76 
48E7 BY ANTHONY PIERJCf 



Y CE 


E1FF 


> 3 


/LOG BEGINNING OF LIN 


DF 


DFO 


/SAVE IT 


8 




/COLUMN 1 


A6 


DO 




81 


D3D 


• • 


26 


R@? 




< 8 




/LOOK FOR END OF LIN 


A6 


DO 




81 


D60 


• " * 


26 


R@< 




20 


R@> 


/FOUND END OF LINE 


? 81 


D20 


/COLUMN 1 I S BLANK? 


27 


R@! 




3F 




/ST0?>J03 IS DOME 


! 8 






3 




/COLUMN 3 


1 A6 


DO 




81 


D20 


VIS LINE BLANK? 


27 


R@< 


/YES->GET NEXT LINE 


BD 


EFF22 /ASCII TO BINARY 


9 7 


DDO 


/STORE OP CODE 


C 




/COMPUTE ADDDRESS... 


49 




/OF MNEMONIC 


59 






49 




/MULTIPLY BY 4 


59 






CB 


D4A 


/ADD 4A00 


D7 


DD2 




97 


DD3 


• 


DE 


DD2 


/ADDRESS OF MNEMONIC 


A6 


D3 


/PUSH MNEMONIC... 


36 


/ONTO STACK 


A6 


D2\ 




— 36 






A6 


Dl 




36 




#■» 


A6 


DO 




DE 


DFO 


/COLUMN 


A7 


D2 


Ami TE MNEMONI C. . . 


32 




/INTO COLUMNS 2-5 


; A7 


D3 




32 






A7 


D4 




32 






A7 


D5 




81 


D60 


/LAST CHAR=60 


26 
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TOTAL 

UTAH RESIDENTS 

ADD 5% SALES TAX 



INDIVIDUALS-must include cashiers check, 

money order, or complete bank card 

information below. Other checks will 

.clear before shipment. .... ,.„ 

.-'"'COMPANIES! Special offers are available on a 

quantity OEM basis in kits, assembled units, 

or our one card computer. All I _'— ■ 
"orders are subject to credit approval. 

Invoices older than 10 days will be 

charged at .05$ per calender day on 

invoice amount. (18^6 per year max.) 
SHIPMENT 

All costs of shipment are to be paid by purchasing party. Shipment will be 

made according to shipment instructions on a "best efforts" basis. No 

claims for lost or damaged shipments will be accepted by this corporation. 



SHIPPING 

TOTAL 

AMOUNT ENCLOSED 
OR TO BE CHARGED 
TO KY CREDIT CARD. 



Sign your name as it 
is on your credit card_ 
Credit Card 
ij Number 



BANK CARD INFORMATION 



Interbank 
Number 



BankAmericard_ 
__ Master Charge" 
Expiration 
Date 



t\ 









MAIL TO: SPHERE CORP. P. O. Box 129 , Bountiful, Utah, 84010 



ta 



S."-r*77rS33! '. ' ' 



1 1 



CORF. 



WARRANTEES 
Warrantee (Assembled Units) 
Warrantee units vhich fail due to defects in material or workmanship 
within 90 days of shipment will be repaired or replaced at our option when 
delivered at 9^*0 North U00 East, North Salt Lake, Utah, with return ship- 
ment prepaid. Suspect modules may be sent. Send all correspondence to P.O. 

Box 129, Bountiful, Utah 8U010. 

Kits Warrantee (All Expensive Repairs) j 

Any part which fails due to defect within 90 days of shipment will 

be replaced. Replacement parts will be sent when failing parts are received 

with a $5.00 handling fee at the above shipping address. Warrantee period 

begins 10 days after shipment from factory. 

EXCLUSIONS 

1. No warrantee as to assembled units shall extend to any unit upon 
which unauthorized repairs or replacements have been attempted prior to re- 
turn. 

2. The warrantee on kit units is expressly limited to replacement of 
defective component parts; no warrantee, express or implied, attaches or 
extends to any assembly process or assembled part. 

3. The warrantees described above shall be IN LIEU OF any other war- 
rantee, express or implied, including, but not limited to, any implied war- 
rantee of MERCHANTABILITY or fitness for a particular purpose. 

Purchaser acknowledges he has read, understood and assents to the 
preceeding warrantee and delivery terms by his signature to this purchase 
order. 

Signature 
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PROGRAM NAME 



DATE 



VERSION 
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OPERAND 



LABEL OP CODd o OPERAND 
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Copyright 1975 Sphere Corporation 
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PROGRAM SUBMITTAL FORM 



Program Title 
Dare 
Author 
Author Address 

Type of Program: 
Program Abstract: 



; 1 - Games, 2 - Utilities, 3 - Demo, 
4 - Business, 5 - I/O handlers, 6 - Other 



Program Length (bytes) 



Source Language 



Use other side for flowchart. Use standard Sphere coding forms for source and object 
listings. 
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